Chip 2003 May/CHIPCD200305.iso/soft/fm42ch.exe/{app}/Foxmail.exe/0/RCDATA/TNEWSMOVIE/TNEWSMOVIE.txt

Text File | 2002-07-04 | 5KB | 218 lines

object NewsMovie: TNewsMovie
  Left = 329
  Top = 145
  BorderStyle = bsNone
  Caption = 'ActionHint'
  ClientHeight = 33
  ClientWidth = 503
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Visible = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 503
    Height = 33
    Align = alClient
    BevelOuter = bvNone
    Color = clWhite
    TabOrder = 0
    object FoxmailTickerPanel: TPanel
      Left = 18
      Top = 0
      Width = 480
      Height = 33
      Align = alClient
      BevelOuter = bvNone
      Color = clBlack
      TabOrder = 0
    end
    object ImageRight: TPanel
      Left = 498
      Top = 0
      Width = 5
      Height = 33
      Cursor = crHSplit
      Align = alRight
      BevelInner = bvRaised
      BevelOuter = bvNone
      BevelWidth = 2
      TabOrder = 1
    end
    object PanelLeft: TPanel
      Left = 0
      Top = 0
      Width = 18
      Height = 33
      Align = alLeft
      PopupMenu = PM
      TabOrder = 2
      OnMouseDown = ImgFoxMouseDown
      object ImgFox: TImage
        Left = 1
        Top = 4
        Width = 16
        Height = 16
        PopupMenu = PM2
        Transparent = True
        OnMouseDown = ImgFoxMouseDown
      end
    end
  end
  object PM: TPopupMenu
    MenuAnimation = [maNone]
    OnPopup = PMPopup
    Left = 50
    Top = 1
    object MI_Open: TMenuItem
      Caption = '&Open'
      Default = True
      OnClick = MI_OpenClick
    end
    object MI_Markasread: TMenuItem
      Caption = 'Mark as &read'
      OnClick = MI_MarkasreadClick
    end
    object MI_Delete: TMenuItem
      Caption = '&Delete'
      OnClick = MI_DeleteClick
    end
    object PM_Clear: TMenuItem
      Caption = '&Clear All Current'
      OnClick = PM_ClearClick
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object PM_Messages: TMenuItem
      Caption = '&Messages'
      OnClick = PM_MessagesClick
      object N3: TMenuItem
        Caption = '-'
      end
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object PM_Setting: TMenuItem
      Caption = '&Settings'
      object PM_Height: TMenuItem
        Caption = '&Height'
        object SingleLine1: TMenuItem
          Caption = '&Single Line'
          GroupIndex = 1
          RadioItem = True
          OnClick = SingleLine1Click
        end
        object MultipleLine1: TMenuItem
          Tag = 1
          Caption = '&Multiple Line'
          GroupIndex = 1
          RadioItem = True
          OnClick = SingleLine1Click
        end
      end
      object PM_Speed: TMenuItem
        Caption = '&Speed'
        object VerySlow1: TMenuItem
          Tag = 1
          Caption = '&Very Slow'
          GroupIndex = 2
          RadioItem = True
          OnClick = VeryFast1Click
        end
        object Slow1: TMenuItem
          Tag = 2
          Caption = '&Slow'
          GroupIndex = 2
          RadioItem = True
          OnClick = VeryFast1Click
        end
        object Normal1: TMenuItem
          Tag = 3
          Caption = '&Normal'
          GroupIndex = 2
          RadioItem = True
          OnClick = VeryFast1Click
        end
        object Fast1: TMenuItem
          Tag = 4
          Caption = '&Fast'
          GroupIndex = 2
          RadioItem = True
          OnClick = VeryFast1Click
        end
        object VeryFast1: TMenuItem
          Tag = 5
          Caption = 'Very F&ast'
          GroupIndex = 2
          RadioItem = True
          OnClick = VeryFast1Click
        end
      end
      object PM_Background: TMenuItem
        Caption = '&Background'
        OnClick = PM_BackgroundClick
        object bassorelievobuiltin1: TMenuItem
          Caption = 'Basso-relievo (built-in)'
          GroupIndex = 1
          RadioItem = True
          OnClick = bassorelievobuiltin1Click
        end
        object Black1: TMenuItem
          Tag = 1
          Caption = '&Gradient black (built-in)'
          GroupIndex = 1
          RadioItem = True
          OnClick = bassorelievobuiltin1Click
        end
        object PM_SELBACK: TMenuItem
          Tag = 2
          Caption = '&Select Bitmap...'
          GroupIndex = 1
          RadioItem = True
          OnClick = bassorelievobuiltin1Click
        end
      end
      object Font1: TMenuItem
        Tag = 1
        Caption = '&Font Color...'
        OnClick = PM_SELBACKClick
      end
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object PM_Hide: TMenuItem
      Caption = '&Hide'
      OnClick = PM_HideClick
    end
  end
  object PM2: TPopupMenu
    MenuAnimation = [maNone]
    OnPopup = PM2Popup
    Left = 274
    Top = 1
    object N4: TMenuItem
      Caption = '-'
    end
  end
  object Language: TLanguage
    LangCenter = DM_Language.LangCenter
    ResStrings.Strings = (
      '0001=Can not find this message!')
    Left = 146
    Top = 1
  end
end